Cream of the Crop 26/Cream of the Crop 26.iso/database/32psro20.zip/_SETUP.1/REO32S.EXE/0/RCDATA/TFORM3/TFORM3.txt

Text File | 1997-05-14 | 78KB | 2,433 lines

object Form3: TForm3
  Left = 85
  Top = 135
  Width = 575
  Height = 489
  Hint = 'Use Right Mouse Button To Display Popup Menus'
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  Caption = 'PrimaSoft'
  Color = clBlue
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  KeyPreview = True
  Menu = MainMenu1
  PixelsPerInch = 96
  PopupMenu = PopupMenu2
  Scaled = False
  ShowHint = True
  OnClose = FormClose
  OnKeyDown = FormKeyDown
  TextHeight = 16
  object Panel4: TPanel
    Left = 0
    Top = 391
    Width = 567
    Height = 35
    BevelInner = bvLowered
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 2
    Visible = False
    object B_Export: TBitBtn
      Left = 5
      Top = 4
      Width = 71
      Height = 26
      Hint = 'Export Data to Text File'
      Caption = 'Export'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      OnClick = B_ExportClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303
        333333333333337FF3333333333333903333333333333377FF33333333333399
        03333FFFFFFFFF777FF3000000999999903377777777777777FF0FFFF0999999
        99037F3337777777777F0FFFF099999999907F3FF777777777770F00F0999999
        99037F773777777777730FFFF099999990337F3FF777777777330F00FFFFF099
        03337F773333377773330FFFFFFFF09033337F3FF3FFF77733330F00F0000003
        33337F773777777333330FFFF0FF033333337F3FF7F3733333330F08F0F03333
        33337F7737F7333333330FFFF003333333337FFFF77333333333000000333333
        3333777777333333333333333333333333333333333333333333}
      NumGlyphs = 2
    end
    object B_Import: TBitBtn
      Left = 79
      Top = 4
      Width = 74
      Height = 26
      Hint = 'Import Data from Text File'
      Caption = 'Import'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnClick = B_ImportClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
        FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
        00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
        F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
        00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
        F033777777777337F73309999990FFF0033377777777FFF77333099999000000
        3333777777777777333333399033333333333337773333333333333903333333
        3333333773333333333333303333333333333337333333333333}
      NumGlyphs = 2
    end
    object B_Password: TBitBtn
      Left = 156
      Top = 4
      Width = 85
      Height = 26
      Hint = 'Change Password'
      Caption = 'Password'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      OnClick = B_PasswordClick
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        5000555555555555577755555555555550B0555555555555F7F7555555555550
        00B05555555555577757555555555550B3B05555555555F7F557555555555000
        3B0555555555577755755555555500B3B0555555555577555755555555550B3B
        055555FFFF5F7F5575555700050003B05555577775777557555570BBB00B3B05
        555577555775557555550BBBBBB3B05555557F555555575555550BBBBBBB0555
        55557F55FF557F5555550BB003BB075555557F577F5575F5555577B003BBB055
        555575F7755557F5555550BB33BBB0555555575F555557F555555507BBBB0755
        55555575FFFF77555555555700007555555555577777755555550000}
      NumGlyphs = 2
    end
    object B_Maintenance: TBitBtn
      Left = 244
      Top = 4
      Width = 98
      Height = 26
      Hint = 'Database Maintenance Functions'
      Caption = 'Maintenance'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
      OnClick = B_MaintenanceClick
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555550FF0559
        1950555FF75F7557F7F757000FF055591903557775F75557F77570FFFF055559
        1933575FF57F5557F7FF0F00FF05555919337F775F7F5557F7F700550F055559
        193577557F7F55F7577F07550F0555999995755575755F7FFF7F5570F0755011
        11155557F755F777777555000755033305555577755F75F77F55555555503335
        0555555FF5F75F757F5555005503335505555577FF75F7557F55505050333555
        05555757F75F75557F5505000333555505557F777FF755557F55000000355557
        07557777777F55557F5555000005555707555577777FF5557F55553000075557
        0755557F7777FFF57555553350000055555555775777775555550000}
      NumGlyphs = 2
    end
    object B_Filter: TBitBtn
      Left = 345
      Top = 4
      Width = 63
      Height = 26
      Hint = 'Define Filter'
      Caption = 'Filter'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 4
      OnClick = B_FilterClick
      Glyph.Data = {
        D6000000424DD60000000000000076000000280000000E0000000C0000000100
        0400000000006000000000000000000000000000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888BBB888
        8800888888000888880088888800088888008888880770888855880000777088
        88008088077777088855808000000000880080800000000088008808B8B08B88
        08008800000000000800888B808888888800888D800B80DD8800}
    end
    object B_Sort: TBitBtn
      Left = 411
      Top = 4
      Width = 62
      Height = 26
      Hint = 'Sort Data'
      Caption = 'Sort'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 5
      OnClick = SortButton1Click
      Glyph.Data = {
        FA000000424DFA000000000000007600000028000000110000000B0000000100
        0400000000008400000000000000000000000000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF008C888C898889
        80808AAA5AAA8C888C88989880808111E11188C8C888989888088AAA5AAA88C8
        C888898880008000F000888C8889898988088222D2228C8C8C88999880008000
        000088CCC8888988880882222222888C8888999888888AAAAAAA888C88888988
        88888C88888888CCC8888888888880000000888C88888888888880000000}
    end
    object B_Summary: TBitBtn
      Left = 476
      Top = 4
      Width = 85
      Height = 26
      Hint = 'Display Summary'
      Caption = 'Summary'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 6
      OnClick = B_SummaryClick
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333333333333333333333333333333FFFFFFFFFFF33330000000000
        03333377777777777F33333003333330033333377FF333377F33333300333333
        0333333377FF33337F3333333003333303333333377FF3337333333333003333
        333333333377FF3333333333333003333333333333377FF33333333333330033
        3333333333337733333333333330033333333333333773333333333333003333
        33333333337733333F3333333003333303333333377333337F33333300333333
        03333333773333337F33333003333330033333377FFFFFF77F33330000000000
        03333377777777777333333333333333333333333333333333330000}
      NumGlyphs = 2
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 391
    Width = 567
    Height = 35
    BevelInner = bvLowered
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 1
    object B_Search: TBitBtn
      Left = 5
      Top = 4
      Width = 66
      Height = 26
      Hint = 'Find Text'
      Caption = 'Find'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      TabStop = False
      OnClick = B_SearchClick
      Glyph.Data = {
        36010000424D3601000000000000760000002800000012000000100000000100
        040000000000C000000000000000000000000000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888078888888
        88888800E111880007888888888888A21EE28000007888888888881181118801
        10078888888888225A2288801100777777888811E111888801100000007888AA
        5AAA88888010078880078811E11188888800788BB87078AA5AAA888888078888
        8BB70800F00088888808888888B80822D22288888807B88888B8080000008888
        8807BBB8888808222222888888007BBB888778AAAAAA8888888077BB88708888
        8888888888880777700888000000888888888000078888000000}
    end
    object B_Options: TBitBtn
      Left = 75
      Top = 4
      Width = 80
      Height = 26
      Hint = 'Set Options'
      Caption = 'Options'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      TabStop = False
      OnClick = B_OptionsClick
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555550FF0559
        1950555FF75F7557F7F757000FF055591903557775F75557F77570FFFF055559
        1933575FF57F5557F7FF0F00FF05555919337F775F7F5557F7F700550F055559
        193577557F7F55F7577F07550F0555999995755575755F7FFF7F5570F0755011
        11155557F755F777777555000755033305555577755F75F77F55555555503335
        0555555FF5F75F757F5555005503335505555577FF75F7557F55505050333555
        05555757F75F75557F5505000333555505557F777FF755557F55000000355557
        07557777777F55557F5555000005555707555577777FF5557F55553000075557
        0755557F7777FFF57555553350000055555555775777775555550000}
      NumGlyphs = 2
    end
    object B_Print: TBitBtn
      Left = 159
      Top = 4
      Width = 66
      Height = 26
      Hint = 'Create and Print Reports'
      Caption = 'Print'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      TabStop = False
      OnClick = B_PrintClick
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        0003377777777777777308888888888888807F33333333333337088888888888
        88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
        8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
        8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
        03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
        03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
        33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
        33333337FFFF77333333333000000333333333377777733333330000}
      NumGlyphs = 2
    end
    object B_New: TBitBtn
      Left = 229
      Top = 4
      Width = 62
      Height = 26
      Hint = 'Add New Record'
      Caption = 'New'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
      TabStop = False
      OnClick = B_NewClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
        333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
        0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
        07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
        07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
        0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
        33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
        B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
        3BB33773333773333773B333333B3333333B7333333733333337}
      NumGlyphs = 2
    end
    object B_Load: TBitBtn
      Left = 295
      Top = 4
      Width = 65
      Height = 26
      Hint = 'Load Another Database'
      Caption = 'Load'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 4
      TabStop = False
      OnClick = B_LoadClick
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        55555FF555FFFFFFF5FF0075500000005000775F57777777F7770B0550CC0090
        50E07F7F57FF77F7F7F70B055000000050E07F75F7777777F7F70B7750CC0090
        50E075F7F7F577F7F7F777B050CC009050E057F7F7F577F7F7F750B050CC0090
        50E057F757F577F7F7F750B770CC009050E0575F77F577F7F7F7577B00CC0090
        50E0557F77F577F7F7F7550B30CC00905000557F57FF77F7F777550B30000090
        50E05575F77777F7F7F7557000CC00905000555777FF77F7F777555550000090
        55555555577777F7F5555555555550005555555555555777F555555555555090
        55555555555557F7F555555555555000555555555555577755550000}
      NumGlyphs = 2
    end
    object B_Exit: TBitBtn
      Left = 501
      Top = 4
      Width = 60
      Height = 26
      Hint = 'Program Shutdown [Alt+F4]'
      Caption = 'Exit'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 7
      TabStop = False
      OnClick = B_ExitClick
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301111111110333337F333333337F33330111111111
        0333337F333333337F333301111111110333337F333333337F33330111111111
        0333337F333333337F333301111111110333337F333333337F33330111111111
        0333337F3333333F7F333301111111B10333337F333333737F33330111111111
        0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
        0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
        0333337F377777337F333301111111110333337F333333337F33330111111111
        0333337FFFFFFFFF7F33330000000000033333777777777773330000}
      NumGlyphs = 2
    end
    object B_Help: TBitBtn
      Left = 437
      Top = 4
      Width = 60
      Height = 26
      Hint = 'Display Help Window'
      Caption = 'Help'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 6
      TabStop = False
      OnClick = Help2Click
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333FFFFF3333333333F797F3333333333F737373FF333333BFB999BFB
        33333337737773773F3333BFBF797FBFB33333733337333373F33BFBFBFBFBFB
        FB3337F33333F33337F33FBFBFB9BFBFBF3337333337F333373FFBFBFBF97BFB
        FBF37F333337FF33337FBFBFBFB99FBFBFB37F3333377FF3337FFBFBFBFB99FB
        FBF37F33333377FF337FBFBF77BF799FBFB37F333FF3377F337FFBFB99FB799B
        FBF373F377F3377F33733FBF997F799FBF3337F377FFF77337F33BFBF99999FB
        FB33373F37777733373333BFBF999FBFB3333373FF77733F7333333BFBFBFBFB
        3333333773FFFF77333333333FBFBF33333333333777773333330000}
      NumGlyphs = 2
    end
    object B_About: TBitBtn
      Left = 364
      Top = 4
      Width = 69
      Height = 26
      Hint = 'Display Information About Authors'
      Caption = 'About'
      ParentShowHint = False
      ShowHint = True
      TabOrder = 5
      TabStop = False
      OnClick = B_AboutClick
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333CCCCC33
        33333FFFF77777FFFFFFCCCCCC808CCCCCC3777777F7F777777F008888070888
        8003777777777777777F0F0770F7F0770F0373F33337F333337370FFFFF7FFFF
        F07337F33337F33337F370FFFB99FBFFF07337F33377F33337F330FFBF99BFBF
        F033373F337733333733370BFBF7FBFB0733337F333FF3337F33370FBF98BFBF
        0733337F3377FF337F333B0BFB990BFB03333373FF777FFF73333FB000B99000
        B33333377737777733333BFBFBFB99FBF33333333FF377F333333FBF99BF99BF
        B333333377F377F3333333FB99FB99FB3333333377FF77333333333FB9999FB3
        333333333777733333333333FBFBFB33333333333333333333330000}
      NumGlyphs = 2
    end
  end
  object Panel7: TPanel
    Left = 271
    Top = 0
    Width = 24
    Height = 391
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 3
    object Panel5: TPanel
      Left = 1
      Top = 21
      Width = 22
      Height = 347
      Align = alClient
      BevelOuter = bvNone
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      object ColorButton1: TColorButton
        Left = 0
        Top = 0
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with A'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'A'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 0
        OnClick = A_BtnClick
      end
      object ColorButton2: TColorButton
        Left = 0
        Top = 13
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with B'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'B'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 1
        OnClick = A_BtnClick
      end
      object ColorButton3: TColorButton
        Left = 0
        Top = 26
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with C'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'C'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 2
        OnClick = A_BtnClick
      end
      object ColorButton4: TColorButton
        Left = 0
        Top = 39
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with D'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'D'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 3
        OnClick = A_BtnClick
      end
      object ColorButton5: TColorButton
        Left = 0
        Top = 52
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with E'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'E'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 4
        OnClick = A_BtnClick
      end
      object ColorButton6: TColorButton
        Left = 0
        Top = 65
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with F'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'F'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 5
        OnClick = A_BtnClick
      end
      object ColorButton7: TColorButton
        Left = 0
        Top = 78
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with G'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'G'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 6
        OnClick = A_BtnClick
      end
      object ColorButton8: TColorButton
        Left = 0
        Top = 91
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with H'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'H'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 7
        OnClick = A_BtnClick
      end
      object ColorButton9: TColorButton
        Left = 0
        Top = 104
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with I'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'I'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 8
        OnClick = A_BtnClick
      end
      object ColorButton10: TColorButton
        Left = 0
        Top = 117
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with J'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'J'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 9
        OnClick = A_BtnClick
      end
      object ColorButton11: TColorButton
        Left = 0
        Top = 130
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with K'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'K'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 10
        OnClick = A_BtnClick
      end
      object ColorButton12: TColorButton
        Left = 0
        Top = 143
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with L'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'L'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 11
        OnClick = A_BtnClick
      end
      object ColorButton13: TColorButton
        Left = 0
        Top = 156
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with M'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'M'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 12
        OnClick = A_BtnClick
      end
      object ColorButton14: TColorButton
        Left = 0
        Top = 169
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with N'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'N'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 13
        OnClick = A_BtnClick
      end
      object ColorButton15: TColorButton
        Left = 0
        Top = 182
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with O'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'O'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 14
        OnClick = A_BtnClick
      end
      object ColorButton16: TColorButton
        Left = 0
        Top = 195
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with P'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'P'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 15
        OnClick = A_BtnClick
      end
      object ColorButton17: TColorButton
        Left = 0
        Top = 208
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with Q'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'Q'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 16
        OnClick = A_BtnClick
      end
      object ColorButton18: TColorButton
        Left = 0
        Top = 221
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with R'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'R'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 17
        OnClick = A_BtnClick
      end
      object ColorButton19: TColorButton
        Left = 0
        Top = 234
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with S'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'S'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 18
        OnClick = A_BtnClick
      end
      object ColorButton20: TColorButton
        Left = 0
        Top = 247
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with T'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'T'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 19
        OnClick = A_BtnClick
      end
      object ColorButton21: TColorButton
        Left = 0
        Top = 260
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with U'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'U'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 20
        OnClick = A_BtnClick
      end
      object ColorButton22: TColorButton
        Left = 0
        Top = 273
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with V'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'V'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 21
        OnClick = A_BtnClick
      end
      object ColorButton23: TColorButton
        Left = 0
        Top = 286
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with W'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'W'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 22
        OnClick = A_BtnClick
      end
      object ColorButton24: TColorButton
        Left = 0
        Top = 299
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with X'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'X'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 23
        OnClick = A_BtnClick
      end
      object ColorButton25: TColorButton
        Left = 0
        Top = 312
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with Y'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'Y'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 24
        OnClick = A_BtnClick
      end
      object ColorButton26: TColorButton
        Left = 0
        Top = 325
        Width = 24
        Height = 14
        Hint = 'Jump to Page beginning with Z'
        BgndColor = clBtnFace
        SelBgndColor = clSilver
        Caption = 'Z'
        ParentShowHint = False
        ShowHint = True
        StayDown = True
        TabOrder = 25
        OnClick = A_BtnClick
      end
    end
    object Panel8: TPanel
      Left = 1
      Top = 368
      Width = 22
      Height = 22
      Align = alBottom
      BevelOuter = bvNone
      TabOrder = 1
      object SpeedButton1: TSpeedButton
        Left = 0
        Top = 3
        Width = 22
        Height = 20
        Hint = 'Scroll Letter Bar Down'
        Enabled = False
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
          333333333337F33333333333333033333333333333373F333333333333090333
          33333333337F7F33333333333309033333333333337373F33333333330999033
          3333333337F337F33333333330999033333333333733373F3333333309999903
          333333337F33337F33333333099999033333333373333373F333333099999990
          33333337FFFF3FF7F33333300009000033333337777F77773333333333090333
          33333333337F7F33333333333309033333333333337F7F333333333333090333
          33333333337F7F33333333333309033333333333337F7F333333333333090333
          33333333337F7F333333333333000333333333333377733333330000}
        NumGlyphs = 2
        OnClick = SpeedButton1Click
      end
    end
    object Panel9: TPanel
      Left = 1
      Top = 1
      Width = 22
      Height = 20
      Align = alTop
      BevelOuter = bvNone
      Caption = 'Panel9'
      TabOrder = 2
      object SpeedButton2: TSpeedButton
        Left = 0
        Top = 1
        Width = 22
        Height = 20
        Hint = 'Scroll Letter Bar Up'
        Enabled = False
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000333
          3333333333777F33333333333309033333333333337F7F333333333333090333
          33333333337F7F33333333333309033333333333337F7F333333333333090333
          33333333337F7F33333333333309033333333333FF7F7FFFF333333000090000
          3333333777737777F333333099999990333333373F3333373333333309999903
          333333337F33337F33333333099999033333333373F333733333333330999033
          3333333337F337F3333333333099903333333333373F37333333333333090333
          33333333337F7F33333333333309033333333333337373333333333333303333
          333333333337F3333333333333303333333333333337333333330000}
        NumGlyphs = 2
        OnClick = SpeedButton2Click
      end
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 271
    Height = 391
    BevelInner = bvLowered
    Ctl3D = True
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 0
    object PrimaHeader1: TPrimaHeader
      Left = 5
      Top = 25
      Width = 260
      Height = 20
      Hint = 'Left Click - Change Order;  Right Click - Menu'
      Font.Color = clBlue
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsItalic]
      ParentFont = False
      TabOrder = 1
      OnHChange = PrimaHeader1HChange
    end
    object SortButton1: TSortButton
      Left = 5
      Top = 3
      Width = 260
      Height = 20
      Caption = 'SortButton1'
      Font.Color = clBlack
      Font.Height = -8
      Font.Name = 'Small Fonts'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = SortButton1Click
      Hint1 =
        '[Primary Sort Field]: Left Click - Sort Options; Right Click - M' +
        'enu'
      Hint2 =
        '[Secondary Sort Field]: Left Click - Sort Options; Right Click -' +
        ' Menu'
      Hint3 = 'Left Click - Set Filter;  Right Click - Menu'
      IsDown1 = True
      IsDown2 = False
      DownBmp.Data = {
        FA000000424DFA000000000000007600000028000000110000000B0000000100
        0400000000008400000000000000000000000000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF008C888C898889
        80808AAA5AAA8C888C88989880808111E11188C8C888989888088AAA5AAA88C8
        C888898880008000F000888C8889898988088222D2228C8C8C88999880008000
        000088CCC8888988880882222222888C8888999888888AAAAAAA888C88888988
        88888C88888888CCC8888888888880000000888C88888888888880000000}
      UpBmp.Data = {
        FA000000424DFA000000000000007600000028000000110000000B0000000100
        0400000000008400000000000000000000000000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0080808988898C
        888C8AAA5AAA80808898988C888C8111E111880888989888C8C88AAA5AAA8000
        88898888C8C88000F0008808898989888C888222D22280008899988C8C8C8000
        0000880888898888CCC8822222228888889998888C888AAAAAAA888888898888
        8C888C888888888888888888CCC8800000008888888888888C8880000000}
      FilterBmp.Data = {
        D6000000424DD60000000000000076000000280000000E0000000C0000000100
        0400000000006000000000000000000000000000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888BBB888
        8800888888000888880088888800088888008888880770888855880000777088
        88008088077777088855808000000000880080800000000088008808B8B08B88
        08008800000000000800888B808888888800888D800B80DD8800}
      OnFilterClick = B_FilterClick
      FilterState = fsFilterOff
      OnFilterMenuClick = SortButton1FilterMenuClick
      OnSort1MenuClick = SortButton1Sort1MenuClick
      OnSort2MenuClick = SortButton1Sort2MenuClick
      OnQuickFilter = SortButton1QuickFilter
      OnSortByClick = SortByMenuClick
    end
    object Panel6: TPanel
      Left = 2
      Top = 354
      Width = 267
      Height = 35
      Align = alBottom
      BevelInner = bvLowered
      TabOrder = 2
      object B_First: TBitBtn
        Left = 5
        Top = 8
        Width = 54
        Height = 24
        Hint = 'GoTo First Page [Ctrl+Home]'
        Caption = 'First'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        TabStop = False
        OnClick = B_FirstClick
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          33333333333333333333333333333333333333333333333333FF333333333333
          3000333333FFFFF3F77733333000003000B033333777773777F733330BFBFB00
          E00033337FFF3377F7773333000FBFB0E000333377733337F7773330FBFBFBF0
          E00033F7FFFF3337F7773000000FBFB0E000377777733337F7770BFBFBFBFBF0
          E00073FFFFFFFF37F777300000000FB0E000377777777337F7773333330BFB00
          000033333373FF77777733333330003333333333333777333333333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          33333333333333333333333333333333333333333333333333330000}
        NumGlyphs = 2
      end
      object B_PgUp: TBitBtn
        Left = 60
        Top = 8
        Width = 54
        Height = 24
        Hint = 'GoTo Previous Page [Ctrl+PgUp]'
        Caption = 'PgUp'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        TabStop = False
        OnClick = B_PgUpClick
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          33333333333333333333333333333333333333333333333333FF333333333333
          3000333333FFFFF3F77733333000003000B033333777773777F733330BFBFB00
          E00033337FFF3377F7773333000FBFB0E000333377733337F7773330FBFBFBF0
          E00033F7FFFF3337F7773000000FBFB0E000377777733337F7770BFBFBFBFBF0
          E00073FFFFFFFF37F777300000000FB0E000377777777337F7773333330BFB00
          000033333373FF77777733333330003333333333333777333333333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          33333333333333333333333333333333333333333333333333330000}
        NumGlyphs = 2
      end
      object SponsorBtn: TBitBtn
        Left = 120
        Top = 2
        Width = 30
        Height = 30
        Hint = 'Go To PrimaSoft Home Page [Ctrl+G]'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        TabStop = False
        OnClick = SponsorBtnClick
        Glyph.Data = {
          A4010000424DA401000000000000760000002800000017000000170000000100
          0400000000001401000000000000000000000000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
          FFFFFFFFFFFCF000000000F000000000FFFFF09999999000CCCCCCC00FFCF09B
          BB999090CCBBBCC0C0FDF099B9999090CBCCCBC0C0FFF099BBB99090CBCCCCC0
          C0F9F099B99B9090CBCCCBC0C0FBF09BBBB99090CCBBBCC0C0FFF09999999090
          CCCCCCC0C0F3F0000000009000000000C0F7FF09999999000CCCCCCC00FEF000
          000000000000000000F6F0AAAAAAA000BBBBBBB00FFFF0A000AAA0A0B000BBB0
          B0FCF0AA0AAAA0A0BBBB0BB0B0F0F0AA000AA0A0BB00BBB0B0FFF0AA0AA0A0A0
          B0BBBBB0B0F8F0A0000AA0A0BB000BB0B0F1F0AAAAAAA0A0BBBBBBB0B0FFF000
          000000A000000000B0F0FF0AAAAAAA000BBBBBBB00F3FFF000000000F0000000
          00FEFFFFFFFFFFFFFFFFFFFFFFF0000000000000000000000000000000000000
          0000000000000000}
      end
      object B_PgDn: TBitBtn
        Left = 155
        Top = 8
        Width = 54
        Height = 24
        Hint = 'GoTo Next Page [Ctrl+PgDn]'
        Caption = 'PgDn'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        TabStop = False
        OnClick = B_PgDnClick
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333333333333333333FFF333333333333000333333333
          3333777FFF3FFFFF33330B000300000333337F777F777773F333000E00BFBFB0
          3333777F773333F7F333000E0BFBF0003333777F7F3337773F33000E0FBFBFBF
          0333777F7F3333FF7FFF000E0BFBF0000003777F7F3337777773000E0FBFBFBF
          BFB0777F7F33FFFFFFF7000E0BF000000003777F7FF777777773000000BFB033
          33337777773FF733333333333300033333333333337773333333333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          33333333333333333333333333333333333333333333333333330000}
        Layout = blGlyphRight
        NumGlyphs = 2
      end
      object B_Last: TBitBtn
        Left = 210
        Top = 8
        Width = 54
        Height = 24
        Hint = 'GoTo Last Page [Ctrl+End]'
        Caption = 'Last'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
        TabStop = False
        OnClick = B_LastClick
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333333333333333333FFF333333333333000333333333
          3333777FFF3FFFFF33330B000300000333337F777F777773F333000E00BFBFB0
          3333777F773333F7F333000E0BFBF0003333777F7F3337773F33000E0FBFBFBF
          0333777F7F3333FF7FFF000E0BFBF0000003777F7F3337777773000E0FBFBFBF
          BFB0777F7F33FFFFFFF7000E0BF000000003777F7FF777777773000000BFB033
          33337777773FF733333333333300033333333333337773333333333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          33333333333333333333333333333333333333333333333333330000}
        Layout = blGlyphRight
        NumGlyphs = 2
      end
    end
  end
  object TabSet1: TTabSet
    Left = 0
    Top = 425
    Width = 566
    Height = 18
    Hint = 'Click on Tabs to select Speed Bar pages'
    BackgroundColor = clBlue
    DitherBackground = False
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentShowHint = False
    ShowHint = True
    Tabs.Strings = (
      'Standard'
      'Advanced')
    TabIndex = 0
    OnClick = TabSet1Click
  end
  object PgRight: TPanel
    Left = 295
    Top = 0
    Width = 272
    Height = 391
    BevelOuter = bvNone
    Color = clSilver
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'System'
    Font.Style = []
    ParentFont = False
    PopupMenu = PopupMenu3
    TabOrder = 5
    object Notebook1: TNotebook
      Left = 0
      Top = 16
      Width = 272
      Height = 325
      Align = alClient
      TabOrder = 0
      object TPage
        Left = 0
        Top = 0
        Caption = 'Page 1'
        object PgR1: TPanel
          Left = 0
          Top = 0
          Width = 272
          Height = 325
          Align = alClient
          BevelInner = bvLowered
          Ctl3D = True
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentColor = True
          ParentCtl3D = False
          ParentFont = False
          TabOrder = 0
          object Label1: TLabel
            Tag = 1
            Left = 6
            Top = 6
            Width = 66
            Height = 14
            Caption = 'Recipe Name:'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label2: TLabel
            Tag = 2
            Left = 6
            Top = 60
            Width = 38
            Height = 14
            Caption = 'Cuisine:'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label8: TLabel
            Tag = 3
            Left = 6
            Top = 94
            Width = 47
            Height = 14
            Caption = 'Category:'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label3: TLabel
            Tag = 4
            Left = 6
            Top = 129
            Width = 25
            Height = 14
            Caption = 'Note:'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label9: TLabel
            Tag = 5
            Left = 6
            Top = 155
            Width = 75
            Height = 14
            Caption = 'Main Ingredient:'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label7: TLabel
            Tag = 6
            Left = 6
            Top = 195
            Width = 64
            Height = 14
            Caption = 'Serving Size:'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label5: TLabel
            Tag = 7
            Left = 6
            Top = 235
            Width = 83
            Height = 14
            Caption = 'Preparation Time:'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label4: TLabel
            Tag = 8
            Left = 6
            Top = 275
            Width = 53
            Height = 14
            Caption = 'Entry Date:'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label6: TLabel
            Tag = 9
            Left = 126
            Top = 155
            Width = 64
            Height = 14
            Caption = 'Small Picture:'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object L1: TEdit
            Tag = 1
            Left = 6
            Top = 20
            Width = 257
            Height = 24
            Hint = 'Enter Text Here'
            AutoSelect = False
            TabOrder = 0
          end
          object L2: TLookup
            Tag = 2
            Left = 80
            Top = 55
            Width = 183
            Height = 24
            Hint = 'Click on the down arrow to see the choices'
            ItemHeight = 16
            Sorted = True
            TabOrder = 1
            Source = 'list1.dbf'
          end
          object L3: TLookup
            Tag = 3
            Left = 80
            Top = 89
            Width = 183
            Height = 24
            Hint = 'Click on the down arrow to see the choices'
            ItemHeight = 16
            Sorted = True
            TabOrder = 2
            Source = 'list2.dbf'
          end
          object L4: TEdit
            Tag = 4
            Left = 80
            Top = 124
            Width = 183
            Height = 24
            Hint = 'Enter Text Here'
            AutoSelect = False
            TabOrder = 3
          end
          object L5: TLookup
            Tag = 5
            Left = 6
            Top = 169
            Width = 115
            Height = 24
            Hint = 'Click on the down arrow to see the choices'
            ItemHeight = 16
            Sorted = True
            TabOrder = 4
            Source = 'list3.dbf'
          end
          object L6: TCurrencyEdit
            Tag = 6
            Left = 6
            Top = 209
            Width = 115
            Height = 24
            Hint = 'Enter Value Here'
            AutoSelect = False
            DisplayFormat = ',0'
            Font.Color = clBlue
            Font.Height = -13
            Font.Name = 'System'
            Font.Style = []
            ParentFont = False
            TabOrder = 5
          end
          object L7: TLookup
            Tag = 7
            Left = 6
            Top = 249
            Width = 115
            Height = 24
            Hint = 'Click on the down arrow to see the choices'
            ItemHeight = 16
            Sorted = True
            TabOrder = 6
            Source = 'list4.dbf'
          end
          object L8: TDateEdit
            Tag = 8
            Left = 6
            Top = 289
            Width = 115
            Height = 24
            Hint = 'Enter Date Here'
            DateFormat = 'mm/dd/yyyy'
            Date = '__/__/____'
            MaxLength = 10
            TabOrder = 7
          end
          object L9: TBmpControl
            Tag = 9
            Left = 126
            Top = 169
            Width = 138
            Height = 146
            Hint = 'Right Mouse Click Displays Menu'
            Caption = 'L9'
            TabOrder = 8
            ShowButtons = False
          end
        end
      end
      object TPage
        Left = 0
        Top = 0
        Caption = 'Page 2'
        object PgR2: TPanel
          Tag = 1
          Left = 0
          Top = 0
          Width = 272
          Height = 325
          Align = alClient
          BevelInner = bvLowered
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentColor = True
          ParentFont = False
          TabOrder = 0
          object Label19: TLabel
            Tag = 10
            Left = 6
            Top = 14
            Width = 56
            Height = 14
            Caption = 'Serve With:'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label15: TLabel
            Tag = 11
            Left = 6
            Top = 43
            Width = 27
            Height = 14
            Caption = 'Wine:'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label33: TLabel
            Tag = 12
            Left = 6
            Top = 72
            Width = 48
            Height = 14
            Caption = 'Custom 1:'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label30: TLabel
            Tag = 13
            Left = 6
            Top = 101
            Width = 48
            Height = 14
            Caption = 'Custom 2:'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object Label10: TLabel
            Tag = 14
            Left = 6
            Top = 126
            Width = 56
            Height = 14
            Caption = 'Ingredients:'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object L10: TEdit
            Tag = 10
            Left = 63
            Top = 9
            Width = 200
            Height = 24
            Hint = 'Enter Text Here'
            AutoSelect = False
            TabOrder = 0
          end
          object L11: TEdit
            Tag = 11
            Left = 63
            Top = 38
            Width = 200
            Height = 24
            Hint = 'Enter Text Here'
            AutoSelect = False
            TabOrder = 1
          end
          object L12: TEdit
            Tag = 12
            Left = 63
            Top = 67
            Width = 200
            Height = 24
            Hint = 'Enter Text Here'
            AutoSelect = False
            TabOrder = 2
          end
          object L13: TLookup
            Tag = 13
            Left = 63
            Top = 96
            Width = 200
            Height = 24
            Hint = 'Click on the down arrow to see the choices'
            ItemHeight = 16
            Sorted = True
            TabOrder = 3
            Source = 'list5.dbf'
          end
          object L14: TMemo
            Tag = 14
            Left = 6
            Top = 140
            Width = 257
            Height = 177
            Hint = 'Enter Text Here'
            ScrollBars = ssBoth
            TabOrder = 4
          end
        end
      end
      object TPage
        Left = 0
        Top = 0
        Caption = 'Page 3'
        object PgR3: TPanel
          Tag = 2
          Left = 0
          Top = 0
          Width = 272
          Height = 325
          Align = alClient
          BevelInner = bvLowered
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentColor = True
          ParentFont = False
          TabOrder = 0
          object TLabel
            Left = 8
            Top = 192
            Width = 4
            Height = 16
          end
          object Label49: TLabel
            Tag = 15
            Left = 6
            Top = 6
            Width = 51
            Height = 14
            Caption = 'Directions:'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object L15: TMemo
            Tag = 15
            Left = 6
            Top = 20
            Width = 257
            Height = 295
            Hint = 'Enter Text Here'
            ScrollBars = ssVertical
            TabOrder = 0
          end
        end
      end
      object TPage
        Left = 0
        Top = 0
        Caption = 'Page 4'
        object PgR4: TPanel
          Tag = 2
          Left = 0
          Top = 0
          Width = 272
          Height = 325
          Align = alClient
          BevelInner = bvLowered
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentColor = True
          ParentFont = False
          TabOrder = 0
          object TLabel
            Left = 8
            Top = 192
            Width = 4
            Height = 16
          end
          object Label51: TLabel
            Tag = 16
            Left = 6
            Top = 5
            Width = 36
            Height = 14
            Caption = 'Picture:'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = []
            ParentFont = False
          end
          object L16: TBmpControl
            Tag = 16
            Left = 6
            Top = 18
            Width = 257
            Height = 301
            Hint = 'Right Mouse Click Displays Menu'
            Caption = 'L16'
            TabOrder = 0
            TabStop = True
            ShowButtons = True
          end
        end
      end
    end
    object TabSet2: TTabSet
      Left = 0
      Top = 371
      Width = 272
      Height = 20
      Hint = 'Select Part of the Record [Alt+#]'
      Align = alBottom
      BackgroundColor = clSilver
      DitherBackground = False
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      Tabs.Strings = (
        'Part 1'
        'Part 2'
        'Part 3'
        'Part 4')
      TabIndex = 0
      OnClick = TabSet2Click
    end
    object Panel2: TPanel
      Left = 0
      Top = 341
      Width = 272
      Height = 30
      Align = alBottom
      BevelInner = bvLowered
      ParentColor = True
      TabOrder = 2
      object PgR_Lbl: TLabel
        Tag = -1
        Left = 233
        Top = 3
        Width = 36
        Height = 12
        Alignment = taRightJustify
        AutoSize = False
        Caption = '999999'
        Color = clYellow
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object Perc_Lbl: TLabel
        Tag = -1
        Left = 233
        Top = 14
        Width = 36
        Height = 12
        Alignment = taRightJustify
        AutoSize = False
        Caption = '100%'
        Color = clYellow
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object B_RPrint: TBitBtn
        Left = 25
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Print Current Record [Alt+P]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        TabStop = False
        OnClick = B_RPrintClick
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
          0003377777777777777308888888888888807F33333333333337088888888888
          88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
          8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
          8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
          03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
          03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
          33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
          33333337FFFF77333333333000000333333333377777733333330000}
        NumGlyphs = 2
      end
      object B_RDelete: TBitBtn
        Left = 48
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Delete Current Record [Alt+Delete]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
        TabStop = False
        OnClick = B_RDeleteClick
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
          3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
          33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
          33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
          333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
          03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
          33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
          0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
          3333333337FFF7F33333333330000033333333333777773333330000}
        NumGlyphs = 2
      end
      object B_RCopy: TBitBtn
        Left = 94
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Copy Current Record To Copy Buffer [Alt+C]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
        TabStop = False
        OnClick = B_RCopyClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF
          FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF
          FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077
          007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000
          7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039
          99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999
          99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
          99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
          93337FFFF7737777733300000033333333337777773333333333}
        NumGlyphs = 2
      end
      object B_RPaste: TBitBtn
        Left = 117
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Paste From Copy Buffer To Current Record [Alt+T]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 5
        TabStop = False
        OnClick = B_RPasteClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330FFFFF
          FFF03333337F3FFFF3F73333330F0000F0F03333337F777737373333330FFFFF
          FFF033FFFF7FFF33FFF77000000007F00000377777777FF777770BBBBBBBB0F0
          FF037777777777F7F3730B77777BB0F0F0337777777777F7F7330B7FFFFFB0F0
          0333777F333377F77F330B7FFFFFB0009333777F333377777FF30B7FFFFFB039
          9933777F333377F777FF0B7FFFFFB0999993777F33337777777F0B7FFFFFB999
          9999777F3333777777770B7FFFFFB0399933777FFFFF77F777F3070077007039
          99337777777777F777F30B770077B039993377FFFFFF77F777330BB7007BB999
          93337777FF777777733370000000073333333777777773333333}
        NumGlyphs = 2
      end
      object B_RUndo: TBitBtn
        Left = 71
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Undo Changes To Current Record [Alt+U]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        TabStop = False
        OnClick = B_RUndoClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
          3333333777333777FF33339993707399933333773337F3777FF3399933000339
          9933377333777F3377F3399333707333993337733337333337FF993333333333
          399377F33333F333377F993333303333399377F33337FF333373993333707333
          333377F333777F333333993333101333333377F333777F3FFFFF993333000399
          999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
          99933773FF777F3F777F339993707399999333773F373F77777F333999999999
          3393333777333777337333333999993333333333377777333333}
        NumGlyphs = 2
      end
      object B_Prev: TBitBtn
        Left = 186
        Top = 3
        Width = 24
        Height = 23
        Hint = 'GoTo Previous Page [Alt+PgUp]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 6
        TabStop = False
        OnClick = Previous1Click
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          33333333333333333333333333333333333333333333333333FF333333333333
          3000333333FFFFF3F77733333000003000B033333777773777F733330BFBFB00
          E00033337FFF3377F7773333000FBFB0E000333377733337F7773330FBFBFBF0
          E00033F7FFFF3337F7773000000FBFB0E000377777733337F7770BFBFBFBFBF0
          E00073FFFFFFFF37F777300000000FB0E000377777777337F7773333330BFB00
          000033333373FF77777733333330003333333333333777333333333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          33333333333333333333333333333333333333333333333333330000}
        NumGlyphs = 2
      end
      object B_Next: TBitBtn
        Left = 209
        Top = 3
        Width = 24
        Height = 23
        Hint = 'GoTo Next Page [Alt+PgDn]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 7
        TabStop = False
        OnClick = Next1Click
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333333333333333333FFF333333333333000333333333
          3333777FFF3FFFFF33330B000300000333337F777F777773F333000E00BFBFB0
          3333777F773333F7F333000E0BFBF0003333777F7F3337773F33000E0FBFBFBF
          0333777F7F3333FF7FFF000E0BFBF0000003777F7F3337777773000E0FBFBFBF
          BFB0777F7F33FFFFFFF7000E0BF000000003777F7FF777777773000000BFB033
          33337777773FF733333333333300033333333333337773333333333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          33333333333333333333333333333333333333333333333333330000}
        Layout = blGlyphRight
        NumGlyphs = 2
      end
      object B_RSynchro: TBitBtn
        Left = 2
        Top = 3
        Width = 24
        Height = 23
        Hint = 'Synchronize Left Page With Current Record [Alt+Y]'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        TabStop = False
        OnClick = B_RSynchroClick
        Glyph.Data = {
          78010000424D7801000000000000760000002800000020000000100000000100
          04000000000000000000120B0000120B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          3333333333333FF3333333333333003333333333333F77F33333333333009033
          333333333F7737F333333333009990333333333F773337FFFFFF330099999000
          00003F773333377777770099999999999990773FF33333FFFFF7330099999000
          000033773FF33777777733330099903333333333773FF7F33333333333009033
          33333333337737F3333333333333003333333333333377333333333333333333
          3333333333333333333333333333333333333333333333333333333333333333
          33333333333333333333333333333333333333333333333333330000}
        NumGlyphs = 2
      end
    end
    object RStatus: TPanel
      Left = 0
      Top = 0
      Width = 272
      Height = 16
      Align = alTop
      Alignment = taLeftJustify
      BevelInner = bvLowered
      Caption = 'Read/Write Access'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentColor = True
      ParentFont = False
      TabOrder = 3
      object Panel10: TPanel
        Left = 176
        Top = 2
        Width = 94
        Height = 12
        Align = alRight
        BevelOuter = bvNone
        PopupMenu = TemplateRMenu
        TabOrder = 0
        object TemplateBtn: TSpeedButton
          Left = 2
          Top = 0
          Width = 91
          Height = 12
          Hint =
            'Left Click - Select New Record Template; Right Click - Popup Men' +
            'u'
          Caption = 'Blank'
          OnClick = TemplateBtnClick
        end
      end
    end
  end
  object Splitter: TPanel
    Left = 278
    Top = 430
    Width = 10
    Height = 14
    Cursor = crHSplit
    Hint = 'Resize Left and Right Pages'
    Caption = 'Splitter'
    TabOrder = 6
    OnMouseDown = SplitterMouseDown
    OnMouseMove = SplitterMouseMove
    OnMouseUp = SplitterMouseUp
    object Image1: TImage
      Left = 1
      Top = 1
      Width = 8
      Height = 38
      Enabled = False
      Picture.Data = {<image000.bmp>}
    end
  end
  object MainMenu1: TMainMenu
    Left = 16
    Top = 50
    object File1: TMenuItem
      Caption = '&File'
      object New1: TMenuItem
        Caption = '&New Record'
        OnClick = B_NewClick
      end
      object Load1: TMenuItem
        Caption = '&Load Database'
        OnClick = B_LoadClick
      end
      object Print1: TMenuItem
        Caption = '&Print'
        OnClick = B_PrintClick
      end
      object Exit1: TMenuItem
        Caption = '&Exit'
        OnClick = B_ExitClick
      end
    end
    object Search1: TMenuItem
      Caption = '&Search'
      object Find1: TMenuItem
        Caption = '&Find'
        OnClick = B_SearchClick
      end
    end
    object Options1: TMenuItem
      Caption = '&Options'
      OnClick = B_OptionsClick
    end
    object Move1: TMenuItem
      Caption = '&Move'
      object First1: TMenuItem
        Caption = '&First'
        OnClick = B_FirstClick
      end
      object PageUp1: TMenuItem
        Caption = 'Page&Up'
        OnClick = B_PgUpClick
      end
      object PageDown1: TMenuItem
        Caption = 'Page&Down'
        OnClick = B_PgDnClick
      end
      object Last1: TMenuItem
        Caption = '&Last'
        OnClick = B_LastClick
      end
      object Previous1: TMenuItem
        Caption = '&Previous'
        OnClick = Previous1Click
      end
      object Next1: TMenuItem
        Caption = '&Next'
        OnClick = Next1Click
      end
    end
    object Advanced1: TMenuItem
      Caption = '&Advanced'
      object Export1: TMenuItem
        Caption = '&Export'
        OnClick = B_ExportClick
      end
      object Import1: TMenuItem
        Caption = '&Import'
        OnClick = B_ImportClick
      end
      object Password1: TMenuItem
        Caption = '&Password'
        OnClick = B_PasswordClick
      end
      object Maintenance1: TMenuItem
        Caption = '&Maintenance'
        OnClick = B_MaintenanceClick
      end
      object Filter1: TMenuItem
        Caption = '&Filter'
        OnClick = B_FilterClick
      end
      object Sort1: TMenuItem
        Caption = '&Sort'
        OnClick = SortButton1Click
      end
      object Summary1: TMenuItem
        Caption = 'S&ummary'
        OnClick = B_SummaryClick
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      object Help2: TMenuItem
        Caption = '&Help Contents'
        OnClick = Help2Click
      end
      object DisplayHints1: TMenuItem
        Caption = '&Tips'
        OnClick = DisplayHints1Click
      end
      object N10: TMenuItem
        Caption = '-'
      end
      object About1: TMenuItem
        Caption = '&About'
        OnClick = B_AboutClick
      end
    end
    object Registration1: TMenuItem
      Caption = '&Registration'
      object HowToRegister1: TMenuItem
        Caption = '&How To Register'
        OnClick = HowToRegister1Click
      end
      object OrderForm1: TMenuItem
        Caption = '&Order Form'
        OnClick = OrderForm1Click
      end
      object EnterDecodeKey1: TMenuItem
        Caption = '&Enter Registration Code'
        OnClick = EnterDecodeKey1Click
      end
    end
  end
  object PopupMenu1: TPopupMenu
    OnPopup = PopupMenu1Popup
    Left = 16
    Top = 80
    object QuickView1: TMenuItem
      Caption = '&Quick View'
      object TMenuItem
      end
    end
    object ViewBuffer1: TMenuItem
      Caption = '&View Copy Buffer'
      object TMenuItem
      end
    end
    object Help3: TMenuItem
      Caption = '-'
    end
    object CopyRecord1: TMenuItem
      Caption = '&Copy Record'
      OnClick = CopyRecord1Click
    end
    object PasteRecord1: TMenuItem
      Caption = '&Paste Record'
      OnClick = PasteRecord1Click
    end
    object Deleterecord1: TMenuItem
      Caption = '&Delete Record'
      OnClick = Deleterecord1Click
    end
    object PrintRecord1: TMenuItem
      Caption = 'P&rint Record'
      OnClick = PrintRecord1Click
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object Font1: TMenuItem
      Caption = '&Font...'
      OnClick = Font1Click
    end
    object Color1: TMenuItem
      Caption = 'C&olor...'
      OnClick = Color1Click
    end
    object N7: TMenuItem
      Caption = '-'
    end
    object FButtonHelp: TMenuItem
      Caption = '&Help'
      OnClick = FButtonHelpClick
    end
  end
  object PopupMenu2: TPopupMenu
    OnPopup = PopupMenu2Popup
    Left = 17
    Top = 112
    object MenusAndSpeedBars1: TMenuItem
      Caption = '&Menus And SpeedBars'
      object ShowBothMenusAndSpeedBars1: TMenuItem
        Caption = 'Show Both'
        OnClick = ShowBothMenusAndSpeedBars1Click
      end
      object ShowOnly1: TMenuItem
        Caption = 'Show Only Menus'
        OnClick = ShowOnly1Click
      end
      object ShowOnlySpeedBars1: TMenuItem
        Caption = 'Show Only Speed Bars'
        OnClick = ShowOnlySpeedBars1Click
      end
      object N6: TMenuItem
        Caption = '-'
      end
      object SpeedBarAtTheTop1: TMenuItem
        Caption = 'Speed Bar At The Top'
        OnClick = SpeedBarAtTheTop1Click
      end
      object SpeedBarAtTheBottom1: TMenuItem
        Caption = 'Speed Bar At The Bottom'
        OnClick = SpeedBarAtTheBottom1Click
      end
    end
    object LetterTabs1: TMenuItem
      Caption = '&Letter Tabs'
      object UseLetterTabs1: TMenuItem
        Caption = 'Enabled'
        OnClick = UseLetterTabs1Click
      end
      object DontUseLetterTabs1: TMenuItem
        Caption = 'Disabled'
        OnClick = DontUseLetterTabs1Click
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object DisplayInCenter1: TMenuItem
        Caption = 'Display In Center'
        OnClick = DisplayInCenter1Click
      end
      object DisplayOnRightSide1: TMenuItem
        Caption = 'Display On Right Side'
        OnClick = DisplayOnRightSide1Click
      end
    end
    object HintMessages1: TMenuItem
      Caption = 'H&int Messages'
      object Show1: TMenuItem
        Caption = 'Show'
        OnClick = Show1Click
      end
      object Hide1: TMenuItem
        Caption = 'Hide'
        OnClick = Hide1Click
      end
    end
    object RecordDeleteMode1: TMenuItem
      Caption = '&Record Delete Mode'
      object AskUserToConfirm1: TMenuItem
        Caption = 'Ask User To Confirm'
        OnClick = AskUserToConfirm1Click
      end
      object ImmediateDelete1: TMenuItem
        Caption = 'Immediate Delete'
        OnClick = ImmediateDelete1Click
      end
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object Help4: TMenuItem
      Caption = '&Help'
      OnClick = Help4Click
    end
  end
  object PopupMenu3: TPopupMenu
    OnPopup = PopupMenu3Popup
    Left = 16
    Top = 144
    object LoadRecordFromTemplate1: TMenuItem
      Caption = 'R&eplace Record With Template'
    end
    object SaveRecordToTemplate1: TMenuItem
      Caption = '&Save Record To Template'
      OnClick = SaveToTemplate1Click
    end
    object N9: TMenuItem
      Caption = '-'
    end
    object ViewBuffer3: TMenuItem
      Caption = '&View Copy Buffer'
      object TMenuItem
      end
    end
    object N4: TMenuItem
      Caption = '-'
    end
    object Paste3: TMenuItem
      Caption = '&Paste Record'
      OnClick = B_RPasteClick
    end
    object Copy3: TMenuItem
      Caption = '&Copy Record'
      OnClick = B_RCopyClick
    end
    object Undo3: TMenuItem
      Caption = '&Undo Changes'
      OnClick = B_RUndoClick
    end
    object Delete3: TMenuItem
      Caption = '&Delete Record'
      OnClick = B_RDeleteClick
    end
    object Print3: TMenuItem
      Caption = 'P&rint Record'
      OnClick = B_RPrintClick
    end
    object Synchronize3: TMenuItem
      Caption = 'S&ynchronize'
      OnClick = B_RSynchroClick
    end
    object Web1: TMenuItem
      Caption = '-'
    end
    object MenuItem7: TMenuItem
      Caption = '&Help'
      OnClick = MenuItem7Click
    end
  end
  object FontDialog1: TFontDialog
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'System'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Options = []
    Left = 16
    Top = 184
  end
  object PopupMenu4: TPopupMenu
    AutoPopup = False
    Left = 16
    Top = 224
    object Text1: TMenuItem
      Caption = '&Text...'
      OnClick = Text1Click
    end
    object Color3: TMenuItem
      Caption = '&Color...'
      OnClick = Color3Click
    end
    object LoadFromTemplate2: TMenuItem
      Caption = '&Load From Template...'
      OnClick = LoadFromTemplate2Click
    end
    object SaveAsTemplate1: TMenuItem
      Caption = '&Save As Template...'
      OnClick = SaveAsTemplate1Click
    end
  end
  object TemplateRMenu: TPopupMenu
    Left = 16
    Top = 256
    object LoadFromTemplate1: TMenuItem
      Caption = '&Replace Record With Template'
    end
    object SaveToTemplate1: TMenuItem
      Caption = '&Save Record To Template'
      OnClick = SaveToTemplate1Click
    end
    object N8: TMenuItem
      Caption = '-'
    end
    object Help5: TMenuItem
      Caption = '&Help'
      OnClick = Help5Click
    end
  end
end